perm filename GALLEY.TEX[MF,DEK]3 blob sn#779646 filedate 1984-12-23 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00006 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	%\read16 to\pagenumber
C00004 00003
C00005 00004
C00018 00005	% now we print the answers, if any
C00019 00006	% stuff for chapter 13...
C00023 ENDMK
CāŠ—;
%\read16 to\pagenumber
\let\MFmanual=\! \input manmac[tex,dek]
\tenpoint
\pageno=800
%\pageno=\pagenumber

\outer\def\beginchapter#1 #2#3. #4\par{\global\exno=0
  \subsecno=0
  \def\chapno{#2#3}
  \ifodd\pageno
    \errmessage{You had too much text on that last page; I'm backing up}
    \advance\pageno by-1 \fi
  \def\\{ } % \\'s in the title will be treated as spaces
  \message{#1 #2#3:} % show the chapter title on the terminal
  \xdef\rhead{#1 #2#3: #4\unskip}
  \advance\pageno by 1 % we skip the title page for now
  \tenpoint
  \noindent\ignorespaces} % the first paragraph of a chapter is not indented
\def\rhead{Experimental Pages for The \MF \kern1ptbook}
\def\chapno{ X}
{\catcode`\%=12 \immediate\write\ans{% Answers for galley proofs:}}
% now we print the answers, if any

% that blank line will stop an unfinished \answer
\immediate\closeout\ans
\vfill\eject
\ninepoint
\input answers
\bye
% stuff for chapter 13...
\setbox0=\hbox{\fiverm0}
\baselineskip=\wd0
\fiverm
\halign{#\hfil\cr
000111000\cr
000111000\cr
000111000\cr
111222111\cr
111222111\cr
111222111\cr
000111000\cr
000111000\cr
000111000\cr
\noalign{\smallskip}
0000000000000000000000000000000000000000000000000000000000000000000000000000\cr
0000001111122222111110000000000000000000000000000000111111110000000000000000\cr
0000111111111211111111100000000000000000000000000111111111111110000000000000\cr
0001111111111011111111110000000000000000000000011111111111111111100000000000\cr
0011111111110001111111111000000000000000000001111111111111111111111000000000\cr
0011111111110001111111111000000000000000000011111111111111111111111100000000\cr
0011111111110001111111111000000000000000000111111111111111111111111110000000\cr
0011111111110001111111111000000000000000001111111111111111111111111111000000\cr
0111111111100000111111111100000000000000011111111111111111111111111111100000\cr
0111111111100000111111111100000000000000011111111111111111111111111111100000\cr
0111111111100000111111111100000000000000111111111111111111111111111111110000\cr
0111111111100000111111111100000000000000111111111111111111111111111111110000\cr
0111111111100000111111111100000000000001111111111111111121111111111111111000\cr
0111111111100000111111111100000000000001111111111111111121111111111111111000\cr
0111111111100000111111111100000000000011111111111111111221111111111111111100\cr
0111111111100000111111111100000000000011111111111112111211112111111111111100\cr
0111111111100000111111111100000000000011111111111111121222211111111111111100\cr
0111111111100000111111111100000000000011111111111111111001111111111111111100\cr
0111111111100000111111111100000000000011111111111111120000111111111111111100\cr
0111111111100000111111111100000000000011111111111122110000112111111111111100\cr
0111111111100000111111111100000000000001111111111111100000011111111111111000\cr
0111111111100000111111111100000000000001111111111111100000011111111111111000\cr
0111111111100000111111111100000000000000111111111111000000001111111111110000\cr
0111111111100000111111111100000000000000011111111110000000000111111111100000\cr
0111111111100000111111111100000000000000000111111000000000000001111110000000\cr
0000000000000000000000000000000000000000000000000000000000000000000000000000\cr
}
\bye